home *** CD-ROM | disk | FTP | other *** search
/ Chip Hitware 7 B / CHIP_HITWARE_7B.iso / Edukacja / City Distance Calculator / CityDist.exe / .rsrc / 0 / RCDATA / TFRMMAIN / TFRMMAIN.txt
Encoding:
Text File  |  1998-03-31  |  4.3 KB  |  191 lines
  1. object frmMain: TfrmMain
  2.   Left = 310
  3.   Top = 108
  4.   Width = 640
  5.   Height = 480
  6.   Caption = 'City Distance Calculator 1.00'
  7.   Font.Charset = DEFAULT_CHARSET
  8.   Font.Color = clWindowText
  9.   Font.Height = -11
  10.   Font.Name = 'MS Sans Serif'
  11.   Font.Style = []
  12.   Menu = MainMenu1
  13.   Position = poScreenCenter
  14.   Scaled = False
  15.   WindowState = wsMaximized
  16.   OnCreate = FormCreate
  17.   PixelsPerInch = 96
  18.   TextHeight = 13
  19.   object Panel1: TPanel
  20.     Left = 0
  21.     Top = 0
  22.     Width = 201
  23.     Height = 409
  24.     Align = alLeft
  25.     Caption = 'Panel1'
  26.     TabOrder = 0
  27.     object Splitter1: TSplitter
  28.       Left = 1
  29.       Top = 305
  30.       Width = 199
  31.       Height = 3
  32.       Cursor = crVSplit
  33.       Align = alTop
  34.     end
  35.     object Panel3: TPanel
  36.       Left = 1
  37.       Top = 1
  38.       Width = 199
  39.       Height = 40
  40.       Align = alTop
  41.       BevelOuter = bvLowered
  42.       TabOrder = 0
  43.       object Label1: TLabel
  44.         Left = 8
  45.         Top = 2
  46.         Width = 94
  47.         Height = 13
  48.         Caption = 'Filter the list of cities'
  49.       end
  50.       object edtFilter: TEdit
  51.         Left = 5
  52.         Top = 16
  53.         Width = 188
  54.         Height = 21
  55.         Hint = 'restict the list of cities'
  56.         TabOrder = 0
  57.         OnChange = edtFilterChange
  58.       end
  59.     end
  60.     object lbxCities: TListBox
  61.       Left = 1
  62.       Top = 41
  63.       Width = 199
  64.       Height = 264
  65.       Hint = 'Double Click or Drag to add waypoint cities'
  66.       Align = alTop
  67.       DragMode = dmAutomatic
  68.       ItemHeight = 13
  69.       Sorted = True
  70.       TabOrder = 1
  71.       OnDblClick = lbxCitiesDblClick
  72.     end
  73.     object grdWayPoints: TStringGrid
  74.       Left = 1
  75.       Top = 308
  76.       Width = 199
  77.       Height = 100
  78.       Hint = 'Double click to remove'
  79.       Align = alClient
  80.       ColCount = 2
  81.       DefaultRowHeight = 18
  82.       FixedCols = 0
  83.       RowCount = 2
  84.       Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goDrawFocusSelected, goRowSelect, goThumbTracking]
  85.       TabOrder = 2
  86.       OnDblClick = grdWayPointsDblClick
  87.       OnDragDrop = grdWayPointsDragDrop
  88.       OnDragOver = grdWayPointsDragOver
  89.       ColWidths = (
  90.         110
  91.         64)
  92.     end
  93.   end
  94.   object pnlHint: TPanel
  95.     Left = 0
  96.     Top = 409
  97.     Width = 632
  98.     Height = 25
  99.     Align = alBottom
  100.     Alignment = taLeftJustify
  101.     BevelInner = bvLowered
  102.     TabOrder = 1
  103.     object Panel4: TPanel
  104.       Left = 451
  105.       Top = 2
  106.       Width = 179
  107.       Height = 21
  108.       Align = alRight
  109.       BevelOuter = bvNone
  110.       Caption = 'Panel4'
  111.       TabOrder = 0
  112.       object SpeedButton1: TSpeedButton
  113.         Left = 1
  114.         Top = 0
  115.         Width = 66
  116.         Height = 22
  117.         Hint = 'Display as a 3D globe'
  118.         GroupIndex = 1
  119.         Down = True
  120.         Caption = 'Spherical'
  121.         Layout = blGlyphBottom
  122.         OnClick = SpeedButton1Click
  123.       end
  124.       object SpeedButton2: TSpeedButton
  125.         Left = 66
  126.         Top = 0
  127.         Width = 66
  128.         Height = 22
  129.         Hint = 'Display as a Mercator projection'
  130.         GroupIndex = 1
  131.         Caption = 'Mercator'
  132.         Layout = blGlyphBottom
  133.         OnClick = SpeedButton2Click
  134.       end
  135.       object btnWorld: TSpeedButton
  136.         Left = 131
  137.         Top = 0
  138.         Width = 49
  139.         Height = 22
  140.         Hint = 'Zoom to the World Extents'
  141.         AllowAllUp = True
  142.         Caption = 'World'
  143.         Layout = blGlyphBottom
  144.         OnClick = btnWorldClick
  145.       end
  146.     end
  147.   end
  148.   object Globe: TGlobe
  149.     Left = 201
  150.     Top = 0
  151.     Width = 431
  152.     Height = 409
  153.     Hint = 
  154.       'Left Mouse to rotate and Right Mouse to Zoom, Left Mouse to sele' +
  155.       'ct a city'
  156.     SelectedPen.Color = clRed
  157.     SelectedBrush.Color = clYellow
  158.     OnRender = GlobeRender
  159.     OnSelected = GlobeSelected
  160.     LongitudeStep = 15
  161.     LatitudeStep = 15
  162.     MouseSelectButton = mzbLeft
  163.     MouseRotateButton = mzbLeft
  164.     XRotationInDegs = 30
  165.     YRotationInDegs = -90
  166.     ZRotationInDegs = 0
  167.     Projection = gpSpherical
  168.     FontAngle = 0
  169.     FontUnit = NauticalMile
  170.     GlobeColor = clAqua
  171.     Color = clBlack
  172.     Align = alClient
  173.     Font.Charset = DEFAULT_CHARSET
  174.     Font.Color = clWhite
  175.     Font.Height = -16
  176.     Font.Name = 'Arial'
  177.     Font.Style = []
  178.   end
  179.   object MainMenu1: TMainMenu
  180.     Left = 302
  181.     Top = 212
  182.     object Exit1: TMenuItem
  183.       Caption = '&Exit'
  184.     end
  185.     object About1: TMenuItem
  186.       Caption = '&About'
  187.       OnClick = About1Click
  188.     end
  189.   end
  190. end
  191.